home *** CD-ROM | disk | FTP | other *** search
/ Serving Financial Service…olutions Suite 1994 Fall / Serving Financial Services Solutions Suite 1994 Fall.iso / Apps / FirstClass / Tailor.app / PDF__Parse.data < prev    next >
Text File  |  1994-12-12  |  726b  |  142 lines
  1. %! Adobe packPS Version 2.0 (9)
  2.  
  3. (* PDF Parse prolog - 28mar94 *\n)
  4. print
  5. /PDFObjects
  6. 100
  7. dict
  8. def
  9. /obj
  10. {
  11. }
  12. bind
  13. def
  14. /endobj
  15. {
  16. 2
  17. array
  18. astore
  19. //PDFObjects
  20. 3
  21. 1
  22. roll
  23. put
  24. //showprogress
  25. exec
  26. }
  27. bind
  28. def
  29. /R
  30. {
  31. /_IndirectReference
  32. 3
  33. 1
  34. roll
  35. 3
  36. array
  37. astore
  38. }
  39. bind
  40. def
  41. /stream
  42. {
  43. dup
  44. /_StreamData
  45. [
  46. currentfile
  47. {
  48. dup
  49. 256
  50. string
  51. readline
  52. not
  53. {
  54. exit
  55. }
  56. if
  57. dup
  58. (endstream)
  59. anchorsearch
  60. {
  61. pop
  62. pop
  63. exit
  64. }
  65. {
  66. pop
  67. }
  68. ifelse
  69. exch
  70. }
  71. loop
  72. pop
  73. pop
  74. ]
  75. put
  76. }
  77. bind
  78. def
  79. /endstream
  80. {
  81. }
  82. bind
  83. def
  84. /xref
  85. {
  86. mark
  87. }
  88. bind
  89. def
  90. /n
  91. {
  92. pop
  93. pop
  94. }
  95. bind
  96. def
  97. /f
  98. {
  99. pop
  100. pop
  101. }
  102. bind
  103. def
  104. /trailer
  105. {
  106. cleartomark
  107. }
  108. bind
  109. def
  110. /startxref
  111. {
  112. dup
  113. /Root
  114. known
  115. {
  116. //PDFObjects
  117. /Root
  118. 2
  119. index
  120. /Root
  121. get
  122. put
  123. }
  124. if
  125. dup
  126. /Info
  127. known
  128. {
  129. //PDFObjects
  130. /Info
  131. 2
  132. index
  133. /Info
  134. get
  135. put
  136. }
  137. if
  138. pop
  139. }
  140. bind
  141. def
  142.